Top 10k strings from District Line (1985)(16-48 Tape Magazine)[a].z80 in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Covertapes / Sinclair ZX Spectrum - Covertapes - [Z80] (TOSEC-v2007-01-01) /

Back to the directory listing

   3 P(X+VX,Y-1
   3 ARROWS ALONG TOP
   3 ARROWS ALONG BOTTOM
   2 ARROWS ALONG RIGHT
   2 ARROWS ALONG LEFT
   2 (P(X+VX,Y+1
   1 VARIABLES INITIALISED  
   1 UNDERGROUND GAME
   1 UFO NEXT TO TRAIN ON ENTRY
   1 TSCR=TSCR-25
   1 TSCR=TSCR+700
   1 TSCR=TSCR+(B(RD))*(UDS=(RD+2
   1 TRAIN MOVING ALONG SIDE OF GRID
   1 TRAIN AT EDGE OF GRID 
   1 SCR=SCR-25
   1 SCR=SCR+S(RD)*UDS+(B(RD))*(UDS=(RD+2
   1 SCORE REPORT
   1 RULE 5 ROUTINE
   1 RULE 4 ROUTINE
   1 RULE 2 ROUTINE
   1 PLOT OUT ARROWS SUBROUTINE
   1 PLOT OUT ARROWS
   1 PLOT IN ARROWS SUBROUTINE
   1 PLOT IN ARROWS
   1 P(X+VX,Y+1
   1 P(TXB,B)=1
   1 P(TXA,B)=1
   1 P(A,TYU)=1
   1 P(A,TYD)=1
   1 NOW GET POSITION INPUTS
   1 NO UFO NEXT TO TRAIN ON ENTRY
   1 LET THE TAPE RUN
   1 HULL,N.HUMBERSIDE
   1 HERE BEGINS THE PLOT PATH THROUGH GRID ROUTINE
   1 FIRE ROUTINE
   1 DEFINE NEW POSITION VECTORS
   1 ASSIGN INITIAL POSITION AND VELOCITY VECTORS
   1 ARROWS RIGHT
   1 ARROWS LEFT
   1 ;S(RD);" POINTS FOR EVERY UFO":
   1 ;B(RD);" POINTS BONUS FOR":
   1 ;"YOUR TOTAL SCORE IS NOW ";TSCR:
   1 ;"YOU SCORED ";TSCR;" POINTS."
   1 ;"YOU SCORED ";SCR;" POINTS ON":
   1 ;"YOU DESTROYED ";UDS;" UFO'S AT ";S(RD):
   1 ;"TRAIN DESTROYED":
   1 ;"THE HIGHEST SCORE NOW STANDS":
   1 ;"SORRY OLD CHAP! YOU FAILED TO":
   1 ;"PRESS ANY KEY";
   1 ;"PRESS ANY KEY TO CONTINUE":
   1 ;"PRESS ANY KEY TO CONTINUE"
   1 ;"JOLLY GOOD SHOW OLD BOY! YOU":
   1 ;"ENTER CO-ORDINATES";
   1 ;"DESTROYING ALL BOMBS."
   1 ;"BONUS OF ";B(RD);" POINTS FOR";
   1 ;"BE SEEING YOU!":
   1 ;"ANOTHER GAME (Y OR N)"
   1 ;"25 POINTS DEDUCTED FOR EVERY":
   1 ;" TO CONTINUE "
   1 ;"    IN XY FORM    ":
   1 8 BOULTON GROVE
   1 *(UDS=(RD+2
   1 *(P(X+VX,Y-1
   1 *(P(X+VX,Y+1
   1 );" UFO'S TO BE DESTROYED."
   1 ))+S(RD)*UDS
   1 " TRAIN DESPATCHED."
   1 " THIS ROUND."
   1 " SCORE OF ";HISC;" POINTS.":
   1 " POINTS.":
   1 " POINTS PER UFO."
   1 " HAVE BEATEN THE CURRENT HIGH":
   1 " DESTROYING ALL UFO'S."
   1 " DESTROYED."
   1 " BEAT THE CURRENT HIGH SCORE OF":
   1 " AT ";HISC;" POINTS.":
   1 " ";HISC;" POINTS.":
   1  BY CHRIS HOWARD STONE